home *** CD-ROM | disk | FTP | other *** search
/ Merciful 5 / Merciful - Disc 5.iso / software / p / pcqpascalv1.2d.lha / Include / Prefs / Locale.i < prev    next >
Text File  |  1997-05-06  |  2KB  |  74 lines
  1.  {      File format for locale preferences }
  2.  
  3.  
  4. {$I "Include:Libraries/IffParse.i"}
  5.  
  6. const
  7.  ID_LCLE = 1279478853;
  8.  ID_CTRY = 1129599577;
  9.  
  10.  
  11. Type
  12.  CountryPrefs = Record
  13.     cp_Reserved     : Array[0..3] of Integer;
  14.     cp_CountryCode  : Integer;
  15.     cp_TelephoneCode: Integer;
  16.     cp_MeasuringSystem : Byte;
  17.  
  18.     cp_DateTimeFormat  : Array[0..79] of Char;
  19.     cp_DateFormat      : Array[0..39] of Char;
  20.     cp_TimeFormat      : Array[0..39] of Char;
  21.  
  22.     cp_ShortDateTimeFormat  : Array[0..79] of Char;
  23.     cp_ShortDateFormat      : Array[0..39] of Char;
  24.     cp_ShortTimeFormat      : Array[0..39] of Char;
  25.  
  26.     { for numeric values }
  27.     cp_DecimalPoint,
  28.     cp_GroupSeparator,
  29.     cp_FracGroupSeparator   : Array[0..9] of Char;
  30.     cp_Grouping,
  31.     cp_FracGrouping         : Array[0..9] of Byte;
  32.  
  33.     { for monetary values }
  34.     cp_MonDecimalPoint,
  35.     cp_MonGroupSeparator,
  36.     cp_MonFracGroupSeparator   : Array[0..9] of Char;
  37.     cp_MonGrouping,
  38.     cp_MonFracGrouping         : Array[0..9] of Byte;
  39.     cp_MonFracDigits,
  40.     cp_MonIntFracDigits        : Byte;
  41.  
  42.     { for currency symbols }
  43.     cp_MonCS,
  44.     cp_MonSmallCS,
  45.     cp_MonIntCS                : Array[0..9] of Char;
  46.  
  47.     { for positive monetary values }
  48.     cp_MonPositiveSign         : Array[0..9] of Char;
  49.     cp_MonPositiveSpaceSep,
  50.     cp_MonPositiveSignPos,
  51.     cp_MonPositiveCSPos        : Byte;
  52.  
  53.     { for negative monetary values }
  54.     cp_MonNegativeSign         : Array[0..9] of Char;
  55.     cp_MonNegativeSpaceSep,
  56.     cp_MonNegativeSignPos,
  57.     cp_MonNegativeCSPos        : Byte;
  58.  
  59.     cp_CalendarType            : Byte;
  60.  end;
  61.  CountryPrefsPtr = ^CountyPrefs;
  62.  
  63.  LocalePrefs = Record
  64.     lp_Reserved         : Array[0..3] of Integer;
  65.     lp_CountryName      : Array[0..31] of Char;
  66.     lp_PreferredLanguages : Array[0..9] of Array[0..29] of Char;
  67.     lp_GMTOffset        : Integer;
  68.     lp_Flags            : Integer;
  69.     lp_CountryData      : CountryPrefs;
  70.  end;
  71.  LocalePrefsPtr = ^LocalePrefs;
  72.  
  73.  
  74.